module phys_types_mod

  use const_mod

  implicit none

  type phys_state_type
    integer :: ncol = 0
    integer :: nlev = 0
    ! 1: level
    ! 2: column
    ! 3: gas
    !                                1 2
    real(r8), allocatable, dimension(:,:  ) :: t   ! Air temperature at half levels (K)
    real(r8), allocatable, dimension(:,:  ) :: p   ! Air pressure at half levels (Pa)
    real(r8), allocatable, dimension(:,:,:) :: q   ! Mixing ratio of gas or tracer (kg kg-1)
  end type phys_state_type

  type phys_tend_type
    
  end type phys_tend_type

end module phys_types_mod
